home *** CD-ROM | disk | FTP | other *** search
/ Freelog 22 / freelog 22.iso / Prog / Djgpp / GPC2952B.ZIP / doc / gpc / docdemos / bparrayinitdemo.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2001-02-09  |  242 b   |  16 lines
  1. program BPArrayInitDemo;
  2.  
  3. const
  4.   MyStringsCount = 5;
  5.  
  6. type
  7.   Ident = String [20];
  8.  
  9. const
  10.   MyStrings : array [1 .. MyStringsCount] of Ident =
  11.     ('export', 'implementation', 'import',
  12.      'interface', 'module');
  13.  
  14. begin
  15. end.
  16.